object Dlg_Wykres: TDlg_Wykres
  Left = 229
  Top = 203
  BorderStyle = bsDialog
  Caption = 'Ustawienia wykresu'
  ClientHeight = 162
  ClientWidth = 450
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnMouseMove = FormMouseMove
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 24
    Top = 48
    Width = 145
    Height = 26
    Alignment = taCenter
    Caption = 'spos�b grupowania wykres�w s�upkowych:'
    WordWrap = True
  end
  object Label1: TLabel
    Left = 24
    Top = 8
    Width = 129
    Height = 13
    Caption = 'wybierz rok do zostawienia:'
  end
  object btnPodglad: TPanel
    Left = 24
    Top = 120
    Width = 129
    Height = 25
    BevelOuter = bvNone
    Caption = 'podgl�d'
    Color = 8257541
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    OnClick = btnPodgladClick
  end
  object btnDrukuj: TPanel
    Left = 296
    Top = 120
    Width = 129
    Height = 25
    BevelOuter = bvNone
    Caption = 'drukuj'
    Color = 8257541
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = btnPodgladClick
  end
  object BarType: TComboBox
    Left = 24
    Top = 76
    Width = 145
    Height = 21
    ItemHeight = 13
    TabOrder = 2
    Text = 'ka�dy osobno'
    Items.Strings = (
      'ka�dy osobno'
      'obok siebie'
      'jeden na drugim'
      'jeden na drugim (procentowo)')
  end
  object DBLookupComboBox1: TDBLookupComboBox
    Left = 24
    Top = 24
    Width = 145
    Height = 21
    KeyField = 'EXTRACT YEAR FROM data_wy'
    ListField = 'EXTRACT YEAR FROM data_wy'
    ListSource = DataSource1
    TabOrder = 3
  end
  object roczne: TCheckBox
    Left = 240
    Top = 24
    Width = 201
    Height = 17
    Caption = 'roczne zestawienie'
    Checked = True
    State = cbChecked
    TabOrder = 4
  end
  object zbiorczeSlupki: TCheckBox
    Left = 240
    Top = 52
    Width = 201
    Height = 17
    Caption = 'zestawienie zbiorcze wykres s�upkowy'
    TabOrder = 5
  end
  object zbiorczeLinie: TCheckBox
    Left = 240
    Top = 80
    Width = 201
    Height = 17
    Caption = 'zestawienie zbiorcze wykres liniowy'
    TabOrder = 6
  end
  object Query1: TQuery
    Active = True
    SQL.Strings = (
      'select distinct extract(year from data_wyst) from faktury')
    Left = 184
    Top = 72
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 216
    Top = 72
  end
  object Groupings: TQuery
    SQL.Strings = (
      'select netto,wartoscVAT,brutto,'
      'extract(month from data_wyst) as miesiac,data_wyst'
      'from faktury'#9)
    Left = 184
    Top = 8
  end
  object Query2: TQuery
    SQL.Strings = (
      'select '
      'sum(x.netto) as suma,x.miesiac'
      'from '
      '"grouping.sql" x'
      'where extract(year from data_wyst) =:rok'
      'group by x.miesiac')
    Left = 216
    Top = 8
    ParamData = <
      item
        DataType = ftInteger
        Name = 'rok'
        ParamType = ptUnknown
        Value = 0
      end>
  end
end